﻿Imports Negocio
Public Class GesRequerimientos

    Public Shared Sub Guardar(requerimiento As Requerimiento)

    End Sub

    Public Shared Sub Eliminar(requerimiento As Requerimiento)
        requerimiento.Persistencia = EstadoPersistencia.DELETE
        Guardar(requerimiento)
    End Sub

    Public Shared Sub Aprobar(requerimiento As Requerimiento)
        Guardar(requerimiento)
    End Sub

    Public Shared Function Consultar(proyecto As Proyecto) As Requerimiento()
        'Cada Objeto EstadoPersistencia.UPDATE
        Dim r As Requerimiento()
        Return r
    End Function

    Public Shared Function Consultar(solicitante As Recurso) As Requerimiento()
        'Cada Objeto EstadoPersistencia.UPDATE
        Dim r As Requerimiento()
        Return r
    End Function

    Public Shared Function Consultar(titulo As String, fecha As Date, usuario As Usuario, prioridad As Nivel) As Requerimiento()
        'Cada Objeto EstadoPersistencia.UPDATE
        Dim r As Requerimiento()
        Return r
    End Function

    Public Shared Sub AgregarSolicitante(requerimiento As Requerimiento, solicitante As Recurso)

    End Sub

    Public Shared Sub QuitarSolicitante(requerimiento As Requerimiento, solicitante As Recurso)

    End Sub

    Public Shared Sub AgregarArchivo(requerimiento As Requerimiento, archivo As Archivo)

    End Sub

    Public Shared Sub QuitarArchivo(requerimiento As Requerimiento, archivo As Archivo)

    End Sub

End Class
